home *** CD-ROM | disk | FTP | other *** search
/ Floppy Magazine 1988 #1 / Floppy_Magazine_88-1_1988_Megasystems_Oy_fi_Side_A.d64 / the scroll! (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  565b  |  16 lines
  1. 0 remark: by toni luode 1886
  2. 1 a$="          ":b$="luodesoft ":c$="presents  ":d$=" ...this!!"
  3. 2 e$=a$+a$+a$+a$+b$+c$+d$+a$+a$+a$+a$
  4. 3 f$=a$+a$+a$+a$+c$+d$+b$+a$+a$+a$+a$
  5. 4 poke53280,0:poke53281,0
  6. 5 print"[147]":j=38
  7. 6 print"[213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201]";
  8. 7 print"[202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203]";
  9. 8 print"[213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201]";
  10. 9 print"[202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203][145]";
  11. 10 i=i+1:print"[145][145][145][145][145]"
  12. 11 print"[145][221][158]";mid$(e$,i,38);"[221]";:ifi=70theni=0
  13. 12 j=j+1:print""
  14. 13 print"[145][221][158]";mid$(f$,len(f$)-j,38);"[221]";:forw=1to50:nextw:ifj=109thenj=38
  15. 14 goto10
  16.